home *** CD-ROM | disk | FTP | other *** search
/ CU Amiga Super CD-ROM 23 / CU Amiga - Super CD-ROM 23 (June 1998).iso / CreatingGames / Utilities / C / GBDK / Install-GBDK < prev   
Encoding:
Text File  |  1996-10-02  |  3.7 KB  |  134 lines
  1. ; $VER: Install-GBDK 1.0 (02.10.96)
  2. ; © 1996 Lars Malmborg <glue@df.lth.se>
  3.  
  4. (procedure install-bin
  5.   (set dest-bin (tackon GBDKdir "bin"))
  6.   (if (not (exists dest-bin))
  7.     (makedir dest-bin))
  8.   (copyfiles
  9.         (prompt "Copying binaries.")
  10.         (help "All binaries should be installed.\n lcc      - the front-end.\n cpp      - the C pre-processor.\n rcc      - the C compiler.\n asGB     - the assembler.\n linkGB   - the linker.\n ILBMtoGB - the bitmap converter.")
  11.     (source "bin/")
  12.     (dest dest-bin)
  13.         (pattern "#?")
  14.         (files)
  15.         (confirm)))
  16.  
  17. (procedure install-include
  18.   (set dest-include (tackon GBDKdir "include"))
  19.   (if (not (exists dest-include))
  20.     (makedir dest-include))
  21.   (copyfiles
  22.         (prompt "Copying includes.")
  23.         (help "All include files should be installed.")
  24.     (source "include/")
  25.     (dest dest-include)
  26.         (pattern "#?")
  27.         (files)
  28.         (confirm)))
  29.  
  30. (procedure install-lib
  31.   (set dest-lib (tackon GBDKdir "lib"))
  32.   (if (not (exists dest-lib))
  33.     (makedir dest-lib))
  34.   (copyfiles
  35.         (prompt "Copying link libraries.")
  36.         (help "All libraries (not real libraries, but anyhow...) should be installed as well as global.h.\nThe sources are optional, but can be quite educational.")
  37.     (source "lib/")
  38.     (dest dest-lib)
  39.         (pattern "#?")
  40.         (files)
  41.         (confirm)))
  42.  
  43. (procedure install-tst
  44.   (set dest-tst (tackon GBDKdir "tst"))
  45.   (if (not (exists dest-tst))
  46.     (makedir dest-tst))
  47.   (copyfiles
  48.         (prompt "Copying first suite of the test files.")
  49.         (help "These are optional, but can be quite educational to take a look at.")
  50.     (source "tst/")
  51.     (dest dest-tst)
  52.         (pattern "#?")
  53.         (files)
  54.         (confirm)))
  55.  
  56. (procedure install-examples
  57.   (set dest-examples (tackon GBDKdir "examples"))
  58.   (if (not (exists dest-examples))
  59.     (makedir dest-examples))
  60.   (copyfiles
  61.         (prompt "Copying second suite of the test files.")
  62.         (help "These are optional, but can be quite educational to take a look at.")
  63.     (source "examples/")
  64.     (dest dest-examples)
  65.         (pattern "#?")
  66.         (files)
  67.         (confirm)))
  68.  
  69. (procedure install-doc
  70.   (set dest-doc (tackon GBDKdir "doc"))
  71.   (if (not (exists dest-doc))
  72.     (makedir dest-doc))
  73.   (copyfiles
  74.         (prompt "Copying documentation for GBDK and GameBoy hardware.")
  75.         (help "GBDK.guide contains all information needed for developing.\nasmlnk.doc is the documentation for the assembler and linker.")
  76.     (source "doc/")
  77.     (dest dest-doc)
  78.         (pattern "#?")
  79.         (files)
  80.         (confirm)))
  81.  
  82.  
  83. (message "Welcome to the GBDK installation utility.\nIt will install everything you need to develop games for GameBoy on Amiga. You can run the programs with AmigaVGB (Aminet:misc/emu/AmigaVGB.lha).\n\nThis Amiga port is © 1996 by Lars Malmborg.\nOriginal UN*X version is © 1996 by Pascal Felber.")
  84.  
  85. (set dir
  86.   (askdir
  87.     (prompt "Please select where you want to install GBDK. A drawer named 'GBDK' will be created in this directory")
  88.     (help "Choose where you want GBDK to be stored. All files will be copied to this location.")
  89.     (default "Work:") ) )
  90.  
  91. (complete 5)
  92.  
  93. (set GBDKdir (tackon dir "GBDK") )
  94. (if (not (exists GBDKdir) )
  95.   ( (makedir GBDKdir) ) )
  96.  
  97. (complete 10)
  98.  
  99. (set @default-dest GBDKdir)
  100.  
  101. (complete 20)
  102.  
  103. (install-bin)
  104.  
  105. (complete 40)
  106.  
  107. (install-include)
  108.  
  109. (complete 50)
  110.  
  111. (install-lib)
  112.  
  113. (complete 60)
  114.  
  115. (install-tst)
  116.  
  117. (complete 70)
  118.  
  119. (install-examples)
  120.  
  121. (complete 80)
  122.  
  123. (install-doc)
  124.  
  125. (complete 90)
  126.  
  127. (startup "GBDK"
  128.     (prompt
  129.         "Some instructions need to be added to the \"S:User-startup\" so that your system will be properly configured to use GBDK.")
  130.     (help "The following will be added to the \"S:User-startup\" if you install to the default destination:\n\n;BEGIN GBDK\nAssign GBDK: Work:GBDK\nPath Work:GBDK/bin\n;END GBDK")
  131.     (command (cat (cat "Assign GBDK: " GBDKdir) "\n"))
  132.     (command (cat (cat "Path " dest-bin) "\n"))
  133. )
  134.